Product Sales by Quarter Sample Code

FOCEXEC Style Sheet
-* File RSALES2.FEX

DEFINE FILE GGORDER
SALE_AMOUNT/D12.2 = QUANTITY * UNIT_PRICE;
YEAR/YY = ORDER_DATE;
QUARTER/Q = ORDER_DATE;
SALES95/D12.2 = IF YEAR IS 1995
THEN SALE_AMOUNT
ELSE 0;
SALES96/D12.2 = IF YEAR IS 1996
THEN SALE_AMOUNT
ELSE 0;
END

TABLE FILE GGORDER
ON TABLE SET PAGE-NUM OFF
SUM SALE_AMOUNT BY PRODUCT_DESCRIPTION AS 'Product Description' BY YEAR AS
'Year' ACROSS QUARTER
AS 'Quarter'
ON PRODUCT_DESCRIPTION UNDER-LINE
ON PRODUCT_DESCRIPTION SKIP-LINE
HEADING CENTER
" Gotham Grinds"
" Product Sales Comparison"
"1995 vs 1996 By Quarter"
ON TABLE ROW-TOTAL
ON TABLE NOTOTAL
WHERE YEAR EQ '1995' OR '1996';
ON TABLE HOLD AS RSALES2A FORMAT HTMTABLE
ON TABLE SET STYLE RSALES20
END
-HTMLFORM hsales2
UNITS=IN, PAGESIZE='Letter', LEFTMARGIN=0.250000, RIGHTMARGIN=0.250000,
TOPMARGIN=0.250000, BOTTOMMARGIN=0.250000, SQUEEZE=ON,
ORIENTATION=PORTRAIT, $
TYPE=REPORT, FOCEXEC=NONE, FONT=ARIAL, SIZE=9, COLOR=BLACK, BACKCOLOR=NONE,
STYLE=NORMAL, $
TYPE=TITLE, COLUMN=N1, SIZE=10, STYLE=BOLD, $
TYPE=TITLE, COLUMN=N2, SIZE=10, STYLE=BOLD, $
TYPE=TITLE, ACROSSCOLUMN=N1, SIZE=10, STYLE=BOLD, $
TYPE=HEADING, LINE=1, OBJECT=TEXT, ITEM=1, SIZE=10, STYLE=BOLD, $
TYPE=HEADING, LINE=2, OBJECT=TEXT, ITEM=1, SIZE=10, STYLE=BOLD, $
TYPE=HEADING, LINE=3, OBJECT=TEXT, ITEM=1, SIZE=10, STYLE=BOLD, $
TYPE=ACROSSVALUE, ACROSS=1, SIZE=10, STYLE=BOLD, $
TYPE=ACROSSTITLE, ACROSS=1, SIZE=10, STYLE=BOLD, $